sorting a vectors in r